home *** CD-ROM | disk | FTP | other *** search
/ Aminet 35 / Aminet 35 (2000)(Schatztruhe)[!][Feb 2000].iso / Aminet / gfx / misc / gnuplot-src.lha / gnuplot-3.7.1src / gnuplot-3.7.1.lha / gnuplot-3.7.1 / term / pbm.trm < prev    next >
Unknown  |  1998-12-16  |  11.0 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text


This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
1% dexvert Windows Terminal Configuration (other/windowsTerminalConfiguration) ext Unsupported
100% file data default
100% gt2 C/C++ Source Code default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 2f 2a 0a 20 2a 20 24 49 | 64 3a 20 70 6c 6c 65 6e |/*. * $I|d: pllen|
|00000010| 74 20 50 42 00 00 00 00 | 00 00 00 00 39 38 2f 31 |t PB....|....98/1|
|00000020| 32 2f 31 35 20 32 30 3a | 32 31 3a 35 32 20 6c 68 |2/15 20:|21:52 lh|
|00000030| 65 63 6b 69 6e 67 20 45 | 78 70 20 24 0a 20 2a 0a |ecking E|xp $. *.|
|00000040| 20 2a 2f 0a 0a 2f 2a 20 | 47 4e 55 50 4c 4f 54 20 | */../* |GNUPLOT |
|00000050| 2d 20 70 62 6d 2e 74 72 | 6d 20 2a 2f 0a 0a 2f 2a |- pbm.tr|m */../*|
|00000060| 5b 0a 20 2a 20 43 6f 70 | 79 72 69 67 68 74 20 31 |[. * Cop|yright 1|
|00000070| 39 39 30 20 2d 20 31 39 | 39 33 2c 20 31 39 39 38 |990 - 19|93, 1998|
|00000080| 0a 20 2a 0a 20 2a 20 50 | 65 72 6d 69 73 73 69 6f |. *. * P|ermissio|
|00000090| 6e 20 74 6f 20 75 73 65 | 2c 20 63 6f 70 79 2c 20 |n to use|, copy, |
|000000a0| 61 6e 64 20 64 69 73 74 | 72 69 62 75 74 65 20 74 |and dist|ribute t|
|000000b0| 68 69 73 20 73 6f 66 74 | 77 61 72 65 20 61 6e 64 |his soft|ware and|
|000000c0| 20 69 74 73 0a 20 2a 20 | 64 6f 63 75 6d 65 6e 74 | its. * |document|
|000000d0| 61 74 69 6f 6e 20 66 6f | 72 20 61 6e 79 20 70 75 |ation fo|r any pu|
|000000e0| 72 70 6f 73 65 20 77 69 | 74 68 20 6f 72 20 77 69 |rpose wi|th or wi|
|000000f0| 74 68 6f 75 74 20 66 65 | 65 20 69 73 20 68 65 72 |thout fe|e is her|
|00000100| 65 62 79 20 67 72 61 6e | 74 65 64 2c 0a 20 2a 20 |eby gran|ted,. * |
|00000110| 70 72 6f 76 69 64 65 64 | 20 74 68 61 74 20 74 68 |provided| that th|
|00000120| 65 20 61 62 6f 76 65 20 | 63 6f 70 79 72 69 67 68 |e above |copyrigh|
|00000130| 74 20 6e 6f 74 69 63 65 | 20 61 70 70 65 61 72 20 |t notice| appear |
|00000140| 69 6e 20 61 6c 6c 20 63 | 6f 70 69 65 73 20 61 6e |in all c|opies an|
|00000150| 64 0a 20 2a 20 74 68 61 | 74 20 62 6f 74 68 20 74 |d. * tha|t both t|
|00000160| 68 61 74 20 63 6f 70 79 | 72 69 67 68 74 20 6e 6f |hat copy|right no|
|00000170| 74 69 63 65 20 61 6e 64 | 20 74 68 69 73 20 70 65 |tice and| this pe|
|00000180| 72 6d 69 73 73 69 6f 6e | 20 6e 6f 74 69 63 65 20 |rmission| notice |
|00000190| 61 70 70 65 61 72 0a 20 | 2a 20 69 6e 20 73 75 70 |appear. |* in sup|
|000001a0| 70 6f 72 74 69 6e 67 20 | 64 6f 63 75 6d 65 6e 74 |porting |document|
|000001b0| 61 74 69 6f 6e 2e 0a 20 | 2a 0a 20 2a 20 50 65 72 |ation.. |*. * Per|
|000001c0| 6d 69 73 73 69 6f 6e 20 | 74 6f 20 6d 6f 64 69 66 |mission |to modif|
|000001d0| 79 20 74 68 65 20 73 6f | 66 74 77 61 72 65 20 69 |y the so|ftware i|
|000001e0| 73 20 67 72 61 6e 74 65 | 64 2c 20 62 75 74 20 6e |s grante|d, but n|
|000001f0| 6f 74 20 74 68 65 20 72 | 69 67 68 74 20 74 6f 0a |ot the r|ight to.|
|00000200| 20 2a 20 64 69 73 74 72 | 69 62 75 74 65 20 74 68 | * distr|ibute th|
|00000210| 65 20 63 6f 6d 70 6c 65 | 74 65 20 6d 6f 64 69 66 |e comple|te modif|
|00000220| 69 65 64 20 73 6f 75 72 | 63 65 20 63 6f 64 65 2e |ied sour|ce code.|
|00000230| 20 20 4d 6f 64 69 66 69 | 63 61 74 69 6f 6e 73 20 | Modifi|cations |
|00000240| 61 72 65 20 74 6f 0a 20 | 2a 20 62 65 20 64 69 73 |are to. |* be dis|
|00000250| 74 72 69 62 75 74 65 64 | 20 61 73 20 70 61 74 63 |tributed| as patc|
|00000260| 68 65 73 20 74 6f 20 74 | 68 65 20 72 65 6c 65 61 |hes to t|he relea|
|00000270| 73 65 64 20 76 65 72 73 | 69 6f 6e 2e 20 20 50 65 |sed vers|ion. Pe|
|00000280| 72 6d 69 73 73 69 6f 6e | 20 74 6f 0a 20 2a 20 64 |rmission| to. * d|
|00000290| 69 73 74 72 69 62 75 74 | 65 20 62 69 6e 61 72 69 |istribut|e binari|
|000002a0| 65 73 20 70 72 6f 64 75 | 63 65 64 20 62 79 20 63 |es produ|ced by c|
|000002b0| 6f 6d 70 69 6c 69 6e 67 | 20 6d 6f 64 69 66 69 65 |ompiling| modifie|
|000002c0| 64 20 73 6f 75 72 63 65 | 73 20 69 73 20 67 72 61 |d source|s is gra|
|000002d0| 6e 74 65 64 2c 0a 20 2a | 20 70 72 6f 76 69 64 65 |nted,. *| provide|
|000002e0| 64 20 79 6f 75 0a 20 2a | 20 20 20 31 2e 20 64 69 |d you. *| 1. di|
|000002f0| 73 74 72 69 62 75 74 65 | 20 74 68 65 20 63 6f 72 |stribute| the cor|
|00000300| 72 65 73 70 6f 6e 64 69 | 6e 67 20 73 6f 75 72 63 |respondi|ng sourc|
|00000310| 65 20 6d 6f 64 69 66 69 | 63 61 74 69 6f 6e 73 20 |e modifi|cations |
|00000320| 66 72 6f 6d 20 74 68 65 | 0a 20 2a 20 20 20 20 72 |from the|. * r|
|00000330| 65 6c 65 61 73 65 64 20 | 76 65 72 73 69 6f 6e 20 |eleased |version |
|00000340| 69 6e 20 74 68 65 20 66 | 6f 72 6d 20 6f 66 20 61 |in the f|orm of a|
|00000350| 20 70 61 74 63 68 20 66 | 69 6c 65 20 61 6c 6f 6e | patch f|ile alon|
|00000360| 67 20 77 69 74 68 20 74 | 68 65 20 62 69 6e 61 72 |g with t|he binar|
|00000370| 69 65 73 2c 0a 20 2a 20 | 20 20 32 2e 20 61 64 64 |ies,. * | 2. add|
|00000380| 20 73 70 65 63 69 61 6c | 20 76 65 72 73 69 6f 6e | special| version|
|00000390| 20 69 64 65 6e 74 69 66 | 69 63 61 74 69 6f 6e 20 | identif|ication |
|000003a0| 74 6f 20 64 69 73 74 69 | 6e 67 75 69 73 68 20 79 |to disti|nguish y|
|000003b0| 6f 75 72 20 76 65 72 73 | 69 6f 6e 0a 20 2a 20 20 |our vers|ion. * |
|000003c0| 20 20 69 6e 20 61 64 64 | 69 74 69 6f 6e 20 74 6f | in add|ition to|
|000003d0| 20 74 68 65 20 62 61 73 | 65 20 72 65 6c 65 61 73 | the bas|e releas|
|000003e0| 65 20 76 65 72 73 69 6f | 6e 20 6e 75 6d 62 65 72 |e versio|n number|
|000003f0| 2c 0a 20 2a 20 20 20 33 | 2e 20 70 72 6f 76 69 64 |,. * 3|. provid|
|00000400| 65 20 79 6f 75 72 20 6e | 61 6d 65 20 61 6e 64 20 |e your n|ame and |
|00000410| 61 64 64 72 65 73 73 20 | 61 73 20 74 68 65 20 70 |address |as the p|
|00000420| 72 69 6d 61 72 79 20 63 | 6f 6e 74 61 63 74 20 66 |rimary c|ontact f|
|00000430| 6f 72 20 74 68 65 0a 20 | 2a 20 20 20 20 73 75 70 |or the. |* sup|
|00000440| 70 6f 72 74 20 6f 66 20 | 79 6f 75 72 20 6d 6f 64 |port of |your mod|
|00000450| 69 66 69 65 64 20 76 65 | 72 73 69 6f 6e 2c 20 61 |ified ve|rsion, a|
|00000460| 6e 64 0a 20 2a 20 20 20 | 34 2e 20 72 65 74 61 69 |nd. * |4. retai|
|00000470| 6e 20 6f 75 72 20 63 6f | 6e 74 61 63 74 20 69 6e |n our co|ntact in|
|00000480| 66 6f 72 6d 61 74 69 6f | 6e 20 69 6e 20 72 65 67 |formatio|n in reg|
|00000490| 61 72 64 20 74 6f 20 75 | 73 65 20 6f 66 20 74 68 |ard to u|se of th|
|000004a0| 65 20 62 61 73 65 0a 20 | 2a 20 20 20 20 73 6f 66 |e base. |* sof|
|000004b0| 74 77 61 72 65 2e 0a 20 | 2a 20 50 65 72 6d 69 73 |tware.. |* Permis|
|000004c0| 73 69 6f 6e 20 74 6f 20 | 64 69 73 74 72 69 62 75 |sion to |distribu|
|000004d0| 74 65 20 74 68 65 20 72 | 65 6c 65 61 73 65 64 20 |te the r|eleased |
|000004e0| 76 65 72 73 69 6f 6e 20 | 6f 66 20 74 68 65 20 73 |version |of the s|
|000004f0| 6f 75 72 63 65 20 63 6f | 64 65 20 61 6c 6f 6e 67 |ource co|de along|
|00000500| 0a 20 2a 20 77 69 74 68 | 20 63 6f 72 72 65 73 70 |. * with| corresp|
|00000510| 6f 6e 64 69 6e 67 20 73 | 6f 75 72 63 65 20 6d 6f |onding s|ource mo|
|00000520| 64 69 66 69 63 61 74 69 | 6f 6e 73 20 69 6e 20 74 |dificati|ons in t|
|00000530| 68 65 20 66 6f 72 6d 20 | 6f 66 20 61 20 70 61 74 |he form |of a pat|
|00000540| 63 68 20 66 69 6c 65 20 | 69 73 0a 20 2a 20 67 72 |ch file |is. * gr|
|00000550| 61 6e 74 65 64 20 77 69 | 74 68 20 73 61 6d 65 20 |anted wi|th same |
|00000560| 70 72 6f 76 69 73 69 6f | 6e 73 20 32 20 74 68 72 |provisio|ns 2 thr|
|00000570| 6f 75 67 68 20 34 20 66 | 6f 72 20 62 69 6e 61 72 |ough 4 f|or binar|
|00000580| 79 20 64 69 73 74 72 69 | 62 75 74 69 6f 6e 73 2e |y distri|butions.|
|00000590| 0a 20 2a 0a 20 2a 20 54 | 68 69 73 20 73 6f 66 74 |. *. * T|his soft|
|000005a0| 77 61 72 65 20 69 73 20 | 70 72 6f 76 69 64 65 64 |ware is |provided|
|000005b0| 20 22 61 73 20 69 73 22 | 20 77 69 74 68 6f 75 74 | "as is"| without|
|000005c0| 20 65 78 70 72 65 73 73 | 20 6f 72 20 69 6d 70 6c | express| or impl|
|000005d0| 69 65 64 20 77 61 72 72 | 61 6e 74 79 0a 20 2a 20 |ied warr|anty. * |
|000005e0| 74 6f 20 74 68 65 20 65 | 78 74 65 6e 74 20 70 65 |to the e|xtent pe|
|000005f0| 72 6d 69 74 74 65 64 20 | 62 79 20 61 70 70 6c 69 |rmitted |by appli|
|00000600| 63 61 62 6c 65 20 6c 61 | 77 2e 0a 5d 2a 2f 0a 0a |cable la|w..]*/..|
|00000610| 2f 2a 0a 20 2a 20 54 68 | 69 73 20 66 69 6c 65 20 |/*. * Th|is file |
|00000620| 69 73 20 69 6e 63 6c 75 | 64 65 64 20 62 79 20 2e |is inclu|ded by .|
|00000630| 2e 2f 74 65 72 6d 2e 63 | 2e 0a 20 2a 0a 20 2a 20 |./term.c|.. *. * |
|00000640| 54 68 69 73 20 74 65 72 | 6d 69 6e 61 6c 20 64 72 |This ter|minal dr|
|00000650| 69 76 65 72 20 73 75 70 | 70 6f 72 74 73 3a 0a 20 |iver sup|ports:. |
|00000660| 2a 20 20 70 62 6d 0a 20 | 2a 0a 20 2a 20 41 55 54 |* pbm. |*. * AUT|
|00000670| 48 4f 52 53 0a 20 2a 20 | 20 52 75 73 73 65 6c 6c |HORS. * | Russell|
|00000680| 20 4c 61 6e 67 0a 20 2a | 0a 20 2a 20 73 65 6e 64 | Lang. *|. * send|
|00000690| 20 79 6f 75 72 20 63 6f | 6d 6d 65 6e 74 73 20 6f | your co|mments o|
|000006a0| 72 20 73 75 67 67 65 73 | 74 69 6f 6e 73 20 74 6f |r sugges|tions to|
|000006b0| 20 28 69 6e 66 6f 2d 67 | 6e 75 70 6c 6f 74 40 64 | (info-g|nuplot@d|
|000006c0| 61 72 74 6d 6f 75 74 68 | 2e 65 64 75 29 2e 0a 20 |artmouth|.edu).. |
|000006d0| 2a 20 0a 20 2a 2f 0a 0a | 2f 2a 20 54 68 65 20 66 |* . */..|/* The f|
|000006e0| 6f 6c 6c 6f 77 69 6e 67 | 20 70 62 6d 70 6c 75 73 |ollowing| pbmplus|
|000006f0| 20 64 72 69 76 65 72 73 | 20 75 73 65 20 74 68 65 | drivers| use the|
|00000700| 20 67 65 6e 65 72 69 63 | 20 62 69 74 20 6d 61 70 | generic| bit map|
|00000710| 70 65 64 20 67 72 61 70 | 68 69 63 73 0a 20 20 20 |ped grap|hics. |
|00000720| 72 6f 75 74 69 6e 65 73 | 20 66 72 6f 6d 20 62 69 |routines| from bi|
|00000730| 74 6d 61 70 2e 63 20 74 | 6f 20 62 75 69 6c 64 20 |tmap.c t|o build |
|00000740| 75 70 20 61 20 62 69 74 | 20 6d 61 70 20 69 6e 20 |up a bit| map in |
|00000750| 6d 65 6d 6f 72 79 2e 20 | 20 54 68 65 20 64 72 69 |memory. | The dri|
|00000760| 76 65 72 0a 20 20 20 69 | 6e 74 65 72 63 68 61 6e |ver. i|nterchan|
|00000770| 67 65 73 20 63 6f 6c 6f | 6d 6e 73 20 61 6e 64 20 |ges colo|mns and |
|00000780| 6c 69 6e 65 73 20 69 6e | 20 6f 72 64 65 72 20 74 |lines in| order t|
|00000790| 6f 20 61 63 63 65 73 73 | 20 65 6e 74 69 72 65 20 |o access| entire |
|000007a0| 6c 69 6e 65 73 0a 20 20 | 20 65 61 73 69 6c 79 20 |lines. | easily |
|000007b0| 61 6e 64 20 72 65 74 75 | 72 6e 73 20 74 68 65 20 |and retu|rns the |
|000007c0| 6c 69 6e 65 73 20 74 6f | 20 67 65 74 20 62 69 74 |lines to| get bit|
|000007d0| 73 20 69 6e 20 74 68 65 | 20 72 69 67 68 74 20 6f |s in the| right o|
|000007e0| 72 64 65 72 20 3a 0a 20 | 20 20 28 78 2c 79 29 20 |rder :. | (x,y) |
|000007f0| 2d 3e 20 28 79 2c 58 4d | 41 58 2d 31 2d 78 29 2e |-> (y,XM|AX-1-x).|
|00000800| 20 2a 2f 0a 2f 2a 20 54 | 68 69 73 20 69 6e 74 65 | */./* T|his inte|
|00000810| 72 63 68 61 6e 67 65 20 | 69 73 20 64 6f 6e 65 20 |rchange |is done |
|00000820| 62 79 20 63 61 6c 6c 69 | 6e 67 20 62 5f 6d 61 6b |by calli|ng b_mak|
|00000830| 65 62 69 74 6d 61 70 28 | 29 20 77 69 74 68 20 72 |ebitmap(|) with r|
|00000840| 65 76 65 72 73 65 64 20 | 0a 20 20 20 78 6d 61 78 |eversed |. xmax|
|00000850| 20 61 6e 64 20 79 6d 61 | 78 2c 20 61 6e 64 20 74 | and yma|x, and t|
|00000860| 68 65 6e 20 73 65 74 74 | 69 6e 67 20 62 5f 72 61 |hen sett|ing b_ra|
|00000870| 73 74 65 72 6d 6f 64 65 | 20 74 6f 20 54 52 55 45 |stermode| to TRUE|
|00000880| 2e 20 20 62 5f 73 65 74 | 70 69 78 65 6c 28 29 0a |. b_set|pixel().|
|00000890| 20 20 20 77 69 6c 6c 20 | 74 68 65 6e 20 70 65 72 | will |then per|
|000008a0| 66 6f 72 6d 20 74 68 65 | 20 69 6e 74 65 72 63 68 |form the| interch|
|000008b0| 61 6e 67 65 20 62 65 66 | 6f 72 65 20 65 61 63 68 |ange bef|ore each|
|000008c0| 20 70 69 78 65 6c 20 69 | 73 20 70 6c 6f 74 74 65 | pixel i|s plotte|
|000008d0| 64 20 2a 2f 0a 2f 2a 20 | 53 65 65 20 4a 65 66 20 |d */./* |See Jef |
|000008e0| 50 6f 73 6b 61 6e 7a 65 | 72 27 73 20 65 78 63 65 |Poskanze|r's exce|
|000008f0| 6c 6c 65 6e 74 20 50 42 | 4d 70 6c 75 73 20 70 61 |llent PB|Mplus pa|
|00000900| 63 6b 61 67 65 20 66 6f | 72 20 6d 6f 72 65 20 64 |ckage fo|r more d|
|00000910| 65 74 61 69 6c 73 20 6f | 66 0a 20 20 20 74 68 65 |etails o|f. the|
|00000920| 20 50 6f 72 74 61 62 6c | 65 20 42 69 74 4d 61 70 | Portabl|e BitMap|
|00000930| 20 66 6f 72 6d 61 74 20 | 61 6e 64 20 66 6f 72 20 | format |and for |
|00000940| 70 72 6f 67 72 61 6d 73 | 20 74 6f 20 63 6f 6e 76 |programs| to conv|
|00000950| 65 72 74 20 50 42 4d 20 | 66 69 6c 65 73 20 20 0a |ert PBM |files .|
|00000960| 20 20 20 74 6f 20 6f 74 | 68 65 72 20 62 69 74 6d | to ot|her bitm|
|00000970| 61 70 20 66 6f 72 6d 61 | 74 73 2e 20 2a 2f 0a 0a |ap forma|ts. */..|
|00000980| 23 69 6e 63 6c 75 64 65 | 20 22 64 72 69 76 65 72 |#include| "driver|
|00000990| 2e 68 22 0a 0a 23 69 66 | 64 65 66 20 54 45 52 4d |.h"..#if|def TERM|
|000009a0| 5f 52 45 47 49 53 54 45 | 52 0a 72 65 67 69 73 74 |_REGISTE|R.regist|
|000009b0| 65 72 5f 74 65 72 6d 28 | 70 62 6d 5f 64 72 69 76 |er_term(|pbm_driv|
|000009c0| 65 72 29 0a 23 65 6e 64 | 69 66 0a 0a 23 69 66 64 |er).#end|if..#ifd|
|000009d0| 65 66 20 54 45 52 4d 5f | 50 52 4f 54 4f 0a 54 45 |ef TERM_|PROTO.TE|
|000009e0| 52 4d 5f 50 55 42 4c 49 | 43 20 76 6f 69 64 20 50 |RM_PUBLI|C void P|
|000009f0| 42 4d 6f 70 74 69 6f 6e | 73 20 5f 5f 50 52 4f 54 |BMoption|s __PROT|
|00000a00| 4f 28 28 76 6f 69 64 29 | 29 3b 0a 54 45 52 4d 5f |O((void)|);.TERM_|
|00000a10| 50 55 42 4c 49 43 20 76 | 6f 69 64 20 50 42 4d 69 |PUBLIC v|oid PBMi|
|00000a20| 6e 69 74 20 5f 5f 50 52 | 4f 54 4f 28 28 76 6f 69 |nit __PR|OTO((voi|
|00000a30| 64 29 29 3b 0a 54 45 52 | 4d 5f 50 55 42 4c 49 43 |d));.TER|M_PUBLIC|
|00000a40| 20 76 6f 69 64 20 50 42 | 4d 72 65 73 65 74 20 5f | void PB|Mreset _|
|00000a50| 5f 50 52 4f 54 4f 28 28 | 76 6f 69 64 29 29 3b 0a |_PROTO((|void));.|
|00000a60| 54 45 52 4d 5f 50 55 42 | 4c 49 43 20 76 6f 69 64 |TERM_PUB|LIC void|
|00000a70| 20 50 42 4d 73 65 74 66 | 6f 6e 74 20 5f 5f 50 52 | PBMsetf|ont __PR|
|00000a80| 4f 54 4f 28 28 76 6f 69 | 64 29 29 3b 0a 54 45 52 |OTO((voi|d));.TER|
|00000a90| 4d 5f 50 55 42 4c 49 43 | 20 76 6f 69 64 20 50 42 |M_PUBLIC| void PB|
|00000aa0| 4d 67 72 61 70 68 69 63 | 73 20 5f 5f 50 52 4f 54 |Mgraphic|s __PROT|
|00000ab0| 4f 28 28 76 6f 69 64 29 | 29 3b 0a 54 45 52 4d 5f |O((void)|);.TERM_|
|00000ac0| 50 55 42 4c 49 43 20 76 | 6f 69 64 20 50 42 4d 6d |PUBLIC v|oid PBMm|
|00000ad0| 6f 6e 6f 74 65 78 74 20 | 5f 5f 50 52 4f 54 4f 28 |onotext |__PROTO(|
|00000ae0| 28 76 6f 69 64 29 29 3b | 0a 54 45 52 4d 5f 50 55 |(void));|.TERM_PU|
|00000af0| 42 4c 49 43 20 76 6f 69 | 64 20 50 42 4d 67 72 61 |BLIC voi|d PBMgra|
|00000b00| 79 74 65 78 74 20 5f 5f | 50 52 4f 54 4f 28 28 76 |ytext __|PROTO((v|
|00000b10| 6f 69 64 29 29 3b 0a 54 | 45 52 4d 5f 50 55 42 4c |oid));.T|ERM_PUBL|
|00000b20| 49 43 20 76 6f 69 64 20 | 50 42 4d 63 6f 6c 6f 72 |IC void |PBMcolor|
|00000b30| 74 65 78 74 20 5f 5f 50 | 52 4f 54 4f 28 28 76 6f |text __P|ROTO((vo|
|00000b40| 69 64 29 29 3b 0a 54 45 | 52 4d 5f 50 55 42 4c 49 |id));.TE|RM_PUBLI|
|00000b50| 43 20 76 6f 69 64 20 50 | 42 4d 74 65 78 74 20 5f |C void P|BMtext _|
|00000b60| 5f 50 52 4f 54 4f 28 28 | 76 6f 69 64 29 29 3b 0a |_PROTO((|void));.|
|00000b70| 54 45 52 4d 5f 50 55 42 | 4c 49 43 20 76 6f 69 64 |TERM_PUB|LIC void|
|00000b80| 20 50 42 4d 6c 69 6e 65 | 74 79 70 65 20 5f 5f 50 | PBMline|type __P|
|00000b90| 52 4f 54 4f 28 28 69 6e | 74 20 6c 69 6e 65 74 79 |ROTO((in|t linety|
|00000ba0| 70 65 29 29 3b 0a 54 45 | 52 4d 5f 50 55 42 4c 49 |pe));.TE|RM_PUBLI|
|00000bb0| 43 20 76 6f 69 64 20 50 | 42 4d 70 6f 69 6e 74 20 |C void P|BMpoint |
|00000bc0| 5f 5f 50 52 4f 54 4f 28 | 28 75 6e 73 69 67 6e 65 |__PROTO(|(unsigne|
|00000bd0| 64 20 69 6e 74 20 78 2c | 20 75 6e 73 69 67 6e 65 |d int x,| unsigne|
|00000be0| 64 20 69 6e 74 20 79 2c | 20 69 6e 74 20 70 6f 69 |d int y,| int poi|
|00000bf0| 6e 74 29 29 3b 0a 23 65 | 6e 64 69 66 20 2f 2a 20 |nt));.#e|ndif /* |
|00000c00| 54 45 52 4d 5f 50 52 4f | 54 4f 20 2a 2f 0a 0a 23 |TERM_PRO|TO */..#|
|00000c10| 69 66 64 65 66 20 54 45 | 52 4d 5f 42 4f 44 59 0a |ifdef TE|RM_BODY.|
|00000c20| 0a 2f 2a 20 6d 61 6b 65 | 20 58 4d 41 58 20 61 6e |./* make| XMAX an|
|00000c30| 64 20 59 4d 41 58 20 61 | 20 6d 75 6c 74 69 70 6c |d YMAX a| multipl|
|00000c40| 65 20 6f 66 20 38 20 2a | 2f 0a 23 64 65 66 69 6e |e of 8 *|/.#defin|
|00000c50| 65 20 50 42 4d 5f 58 4d | 41 58 20 28 36 34 30 29 |e PBM_XM|AX (640)|
|00000c60| 0a 23 64 65 66 69 6e 65 | 20 50 42 4d 5f 59 4d 41 |.#define| PBM_YMA|
|00000c70| 58 20 28 34 38 30 29 0a | 23 64 65 66 69 6e 65 20 |X (480).|#define |
|00000c80| 50 42 4d 5f 56 43 48 41 | 52 20 28 46 4e 54 35 58 |PBM_VCHA|R (FNT5X|
|00000c90| 39 5f 56 43 48 41 52 29 | 0a 23 64 65 66 69 6e 65 |9_VCHAR)|.#define|
|00000ca0| 20 50 42 4d 5f 48 43 48 | 41 52 20 28 46 4e 54 35 | PBM_HCH|AR (FNT5|
|00000cb0| 58 39 5f 56 43 48 41 52 | 29 0a 23 64 65 66 69 6e |X9_VCHAR|).#defin|
|00000cc0| 65 20 50 42 4d 5f 56 54 | 49 43 20 46 4e 54 35 58 |e PBM_VT|IC FNT5X|
|00000cd0| 39 5f 48 42 49 54 53 0a | 23 64 65 66 69 6e 65 20 |9_HBITS.|#define |
|00000ce0| 50 42 4d 5f 48 54 49 43 | 20 46 4e 54 35 58 39 5f |PBM_HTIC| FNT5X9_|
|00000cf0| 48 42 49 54 53 0a 0a 73 | 74 61 74 69 63 20 69 6e |HBITS..s|tatic in|
|00000d00| 74 20 70 62 6d 5f 66 6f | 6e 74 20 3d 20 31 3b 09 |t pbm_fo|nt = 1;.|
|00000d10| 2f 2a 20 73 6d 61 6c 6c | 20 66 6f 6e 74 20 2a 2f |/* small| font */|
|00000d20| 0a 73 74 61 74 69 63 20 | 69 6e 74 20 70 62 6d 5f |.static |int pbm_|
|00000d30| 6d 6f 64 65 20 3d 20 30 | 3b 09 2f 2a 20 30 3a 6d |mode = 0|;./* 0:m|
|00000d40| 6f 6e 6f 63 68 72 6f 6d | 65 20 31 3a 67 72 61 79 |onochrom|e 1:gray|
|00000d50| 20 32 3a 63 6f 6c 6f 72 | 20 2a 2f 0a 0a 2f 2a 20 | 2:color| */../* |
|00000d60| 37 3d 62 6c 61 63 6b 2c | 20 30 3d 77 68 69 74 65 |7=black,| 0=white|
|00000d70| 20 2a 2f 0a 73 74 61 74 | 69 63 20 69 6e 74 20 70 | */.stat|ic int p|
|00000d80| 67 6d 5f 67 72 61 79 5b | 5d 20 3d 20 7b 20 37 2c |gm_gray[|] = { 7,|
|00000d90| 20 31 2c 20 36 2c 20 35 | 2c 20 34 2c 20 33 2c 20 | 1, 6, 5|, 4, 3, |
|00000da0| 32 2c 20 31 2c 20 37 20 | 7d 3b 09 2f 2a 20 67 72 |2, 1, 7 |};./* gr|
|00000db0| 61 79 73 20 20 2a 2f 0a | 2f 2a 20 62 69 74 33 3d |ays */.|/* bit3=|
|00000dc0| 21 69 6e 74 65 6e 73 69 | 66 79 2c 20 62 69 74 32 |!intensi|fy, bit2|
|00000dd0| 3d 21 72 65 64 2c 20 62 | 69 74 31 3d 21 67 72 65 |=!red, b|it1=!gre|
|00000de0| 65 6e 2c 20 62 69 74 30 | 3d 21 62 6c 75 65 20 2a |en, bit0|=!blue *|
|00000df0| 2f 0a 73 74 61 74 69 63 | 20 69 6e 74 20 70 70 6d |/.static| int ppm|
|00000e00| 5f 63 6f 6c 6f 72 5b 5d | 20 3d 7b 20 31 35 2c 20 |_color[]| ={ 15, |
|00000e10| 38 2c 20 33 2c 20 35 2c | 20 36 2c 20 32 2c 20 34 |8, 3, 5,| 6, 2, 4|
|00000e20| 2c 20 31 2c 20 31 31 2c | 20 31 33 2c 20 31 34 20 |, 1, 11,| 13, 14 |
|00000e30| 7d 3b 20 20 2f 2a 20 63 | 6f 6c 6f 72 73 20 2a 2f |}; /* c|olors */|
|00000e40| 0a 0a 54 45 52 4d 5f 50 | 55 42 4c 49 43 20 76 6f |..TERM_P|UBLIC vo|
|00000e50| 69 64 20 50 42 4d 6f 70 | 74 69 6f 6e 73 28 29 0a |id PBMop|tions().|
|00000e60| 7b 0a 20 20 20 20 70 62 | 6d 5f 66 6f 6e 74 20 3d |{. pb|m_font =|
|00000e70| 20 31 3b 0a 20 20 20 20 | 70 62 6d 5f 6d 6f 64 65 | 1;. |pbm_mode|
|00000e80| 20 3d 20 30 3b 0a 0a 20 | 20 20 20 74 65 72 6d 5f | = 0;.. | term_|
|00000e90| 6f 70 74 69 6f 6e 73 5b | 30 5d 20 3d 20 4e 55 4c |options[|0] = NUL|
|00000ea0| 3b 0a 0a 20 20 20 20 77 | 68 69 6c 65 20 28 21 45 |;.. w|hile (!E|
|00000eb0| 4e 44 5f 4f 46 5f 43 4f | 4d 4d 41 4e 44 29 20 7b |ND_OF_CO|MMAND) {|
|00000ec0| 0a 09 69 66 20 28 61 6c | 6d 6f 73 74 5f 65 71 75 |..if (al|most_equ|
|00000ed0| 61 6c 73 28 63 5f 74 6f | 6b 65 6e 2c 20 22 73 24 |als(c_to|ken, "s$|
|00000ee0| 6d 61 6c 6c 22 29 29 0a | 09 20 20 20 20 70 62 6d |mall")).|. pbm|
|00000ef0| 5f 66 6f 6e 74 20 3d 20 | 31 3b 0a 09 65 6c 73 65 |_font = |1;..else|
|00000f00| 20 69 66 20 28 61 6c 6d | 6f 73 74 5f 65 71 75 61 | if (alm|ost_equa|
|00000f10| 6c 73 28 63 5f 74 6f 6b | 65 6e 2c 20 22 6d 65 24 |ls(c_tok|en, "me$|
|00000f20| 64 69 75 6d 22 29 29 0a | 09 20 20 20 20 70 62 6d |dium")).|. pbm|
|00000f30| 5f 66 6f 6e 74 20 3d 20 | 32 3b 0a 09 65 6c 73 65 |_font = |2;..else|
|00000f40| 20 69 66 20 28 61 6c 6d | 6f 73 74 5f 65 71 75 61 | if (alm|ost_equa|
|00000f50| 6c 73 28 63 5f 74 6f 6b | 65 6e 2c 20 22 6c 24 61 |ls(c_tok|en, "l$a|
|00000f60| 72 67 65 22 29 29 0a 09 | 20 20 20 20 70 62 6d 5f |rge"))..| pbm_|
|00000f70| 66 6f 6e 74 20 3d 20 33 | 3b 0a 09 65 6c 73 65 20 |font = 3|;..else |
|00000f80| 69 66 20 28 61 6c 6d 6f | 73 74 5f 65 71 75 61 6c |if (almo|st_equal|
|00000f90| 73 28 63 5f 74 6f 6b 65 | 6e 2c 20 22 6d 6f 24 6e |s(c_toke|n, "mo$n|
|00000fa0| 6f 63 68 72 6f 6d 65 22 | 29 29 0a 09 20 20 20 20 |ochrome"|)).. |
|00000fb0| 70 62 6d 5f 6d 6f 64 65 | 20 3d 20 30 3b 0a 09 65 |pbm_mode| = 0;..e|
|00000fc0| 6c 73 65 20 69 66 20 28 | 61 6c 6d 6f 73 74 5f 65 |lse if (|almost_e|
|00000fd0| 71 75 61 6c 73 28 63 5f | 74 6f 6b 65 6e 2c 20 22 |quals(c_|token, "|
|00000fe0| 67 24 72 61 79 22 29 29 | 0a 09 20 20 20 20 70 62 |g$ray"))|.. pb|
|00000ff0| 6d 5f 6d 6f 64 65 20 3d | 20 31 3b 0a 09 65 6c 73 |m_mode =| 1;..els|
|00001000| 65 20 69 66 20 28 61 6c | 6d 6f 73 74 5f 65 71 75 |e if (al|most_equ|
|00001010| 61 6c 73 28 63 5f 74 6f | 6b 65 6e 2c 20 22 63 24 |als(c_to|ken, "c$|
|00001020| 6f 6c 6f 72 22 29 0a 09 | 09 20 7c 7c 20 61 6c 6d |olor")..|. || alm|
|00001030| 6f 73 74 5f 65 71 75 61 | 6c 73 28 63 5f 74 6f 6b |ost_equa|ls(c_tok|
|00001040| 65 6e 2c 20 22 63 24 6f | 6c 6f 75 72 22 29 29 0a |en, "c$o|lour")).|
|00001050| 09 20 20 20 20 70 62 6d | 5f 6d 6f 64 65 20 3d 20 |. pbm|_mode = |
|00001060| 32 3b 0a 09 65 6c 73 65 | 20 7b 0a 09 20 20 20 20 |2;..else| {.. |
|00001070| 2f 2a 20 72 65 73 65 74 | 20 74 6f 20 64 65 66 61 |/* reset| to defa|
|00001080| 75 6c 74 2c 20 73 69 6e | 63 65 20 74 65 72 6d 20 |ult, sin|ce term |
|00001090| 69 73 20 61 6c 72 65 61 | 64 79 20 73 65 74 20 2a |is alrea|dy set *|
|000010a0| 2f 20 0a 09 20 20 20 20 | 70 62 6d 5f 66 6f 6e 74 |/ .. |pbm_font|
|000010b0| 20 3d 20 31 3b 0a 09 20 | 20 20 20 70 62 6d 5f 6d | = 1;.. | pbm_m|
|000010c0| 6f 64 65 20 3d 20 30 3b | 0a 09 20 20 20 20 69 6e |ode = 0;|.. in|
|000010d0| 74 5f 65 72 72 6f 72 28 | 22 65 78 70 65 63 74 69 |t_error(|"expecti|
|000010e0| 6e 67 3a 20 7b 73 6d 61 | 6c 6c 2c 20 6d 65 64 69 |ng: {sma|ll, medi|
|000010f0| 75 6d 2c 20 6c 61 72 67 | 65 7d 20 61 6e 64 20 7b |um, larg|e} and {|
|00001100| 6d 6f 6e 6f 63 68 72 6f | 6d 65 2c 20 67 72 61 79 |monochro|me, gray|
|00001110| 2c 20 63 6f 6c 6f 72 7d | 22 2c 20 63 5f 74 6f 6b |, color}|", c_tok|
|00001120| 65 6e 29 3b 0a 09 7d 0a | 09 63 5f 74 6f 6b 65 6e |en);..}.|.c_token|
|00001130| 2b 2b 3b 0a 20 20 20 20 | 7d 0a 0a 20 20 20 20 2f |++;. |}.. /|
|00001140| 2a 20 73 65 74 75 70 20 | 6f 70 74 69 6f 6e 73 20 |* setup |options |
|00001150| 73 74 72 69 6e 67 20 2a | 2f 0a 0a 20 20 20 20 73 |string *|/.. s|
|00001160| 77 69 74 63 68 20 28 70 | 62 6d 5f 66 6f 6e 74 29 |witch (p|bm_font)|
|00001170| 20 7b 0a 20 20 20 20 63 | 61 73 65 20 31 3a 0a 09 | {. c|ase 1:..|
|00001180| 73 74 72 63 61 74 28 74 | 65 72 6d 5f 6f 70 74 69 |strcat(t|erm_opti|
|00001190| 6f 6e 73 2c 20 22 73 6d | 61 6c 6c 22 29 3b 0a 09 |ons, "sm|all");..|
|000011a0| 62 72 65 61 6b 3b 0a 20 | 20 20 20 63 61 73 65 20 |break;. | case |
|000011b0| 32 3a 0a 09 73 74 72 63 | 61 74 28 74 65 72 6d 5f |2:..strc|at(term_|
|000011c0| 6f 70 74 69 6f 6e 73 2c | 20 22 6d 65 64 69 75 6d |options,| "medium|
|000011d0| 22 29 3b 0a 09 62 72 65 | 61 6b 3b 0a 20 20 20 20 |");..bre|ak;. |
|000011e0| 63 61 73 65 20 33 3a 0a | 09 73 74 72 63 61 74 28 |case 3:.|.strcat(|
|000011f0| 74 65 72 6d 5f 6f 70 74 | 69 6f 6e 73 2c 20 22 6c |term_opt|ions, "l|
|00001200| 61 72 67 65 22 29 3b 0a | 09 62 72 65 61 6b 3b 0a |arge");.|.break;.|
|00001210| 20 20 20 20 7d 0a 0a 20 | 20 20 20 73 77 69 74 63 | }.. | switc|
|00001220| 68 20 28 70 62 6d 5f 6d | 6f 64 65 29 20 7b 0a 20 |h (pbm_m|ode) {. |
|00001230| 20 20 20 63 61 73 65 20 | 30 3a 0a 09 73 74 72 63 | case |0:..strc|
|00001240| 61 74 28 74 65 72 6d 5f | 6f 70 74 69 6f 6e 73 2c |at(term_|options,|
|00001250| 20 22 20 6d 6f 6e 6f 63 | 68 72 6f 6d 65 22 29 3b | " monoc|hrome");|
|00001260| 0a 09 62 72 65 61 6b 3b | 0a 20 20 20 20 63 61 73 |..break;|. cas|
|00001270| 65 20 31 3a 0a 09 73 74 | 72 63 61 74 28 74 65 72 |e 1:..st|rcat(ter|
|00001280| 6d 5f 6f 70 74 69 6f 6e | 73 2c 20 22 20 67 72 61 |m_option|s, " gra|
|00001290| 79 22 29 3b 0a 09 62 72 | 65 61 6b 3b 0a 20 20 20 |y");..br|eak;. |
|000012a0| 20 63 61 73 65 20 32 3a | 0a 09 73 74 72 63 61 74 | case 2:|..strcat|
|000012b0| 28 74 65 72 6d 5f 6f 70 | 74 69 6f 6e 73 2c 20 22 |(term_op|tions, "|
|000012c0| 20 63 6f 6c 6f 72 22 29 | 3b 0a 09 62 72 65 61 6b | color")|;..break|
|000012d0| 3b 0a 20 20 20 20 7d 0a | 7d 0a 0a 0a 54 45 52 4d |;. }.|}...TERM|
|000012e0| 5f 50 55 42 4c 49 43 20 | 76 6f 69 64 20 50 42 4d |_PUBLIC |void PBM|
|000012f0| 69 6e 69 74 28 29 0a 7b | 0a 20 20 20 20 50 42 4d |init().{|. PBM|
|00001300| 73 65 74 66 6f 6e 74 28 | 29 3b 09 09 2f 2a 20 48 |setfont(|);../* H|
|00001310| 42 42 20 39 38 30 32 32 | 36 3a 20 63 61 6c 6c 20 |BB 98022|6: call |
|00001320| 69 74 20 68 65 72 65 21 | 20 2a 2f 0a 7d 0a 0a 0a |it here!| */.}...|
|00001330| 54 45 52 4d 5f 50 55 42 | 4c 49 43 20 76 6f 69 64 |TERM_PUB|LIC void|
|00001340| 20 50 42 4d 72 65 73 65 | 74 28 29 0a 7b 0a 23 69 | PBMrese|t().{.#i|
|00001350| 66 64 65 66 20 56 4d 53 | 0a 20 20 20 20 66 66 6c |fdef VMS|. ffl|
|00001360| 75 73 68 5f 62 69 6e 61 | 72 79 28 29 3b 0a 23 65 |ush_bina|ry();.#e|
|00001370| 6e 64 69 66 20 2f 2a 20 | 56 4d 53 20 2a 2f 0a 7d |ndif /* |VMS */.}|
|00001380| 0a 0a 0a 54 45 52 4d 5f | 50 55 42 4c 49 43 20 76 |...TERM_|PUBLIC v|
|00001390| 6f 69 64 20 50 42 4d 73 | 65 74 66 6f 6e 74 28 29 |oid PBMs|etfont()|
|000013a0| 0a 7b 0a 20 20 20 20 73 | 77 69 74 63 68 20 28 70 |.{. s|witch (p|
|000013b0| 62 6d 5f 66 6f 6e 74 29 | 20 7b 0a 20 20 20 20 63 |bm_font)| {. c|
|000013c0| 61 73 65 20 31 3a 0a 09 | 62 5f 63 68 61 72 73 69 |ase 1:..|b_charsi|
|000013d0| 7a 65 28 46 4e 54 35 58 | 39 29 3b 0a 09 74 65 72 |ze(FNT5X|9);..ter|
|000013e0| 6d 2d 3e 76 5f 63 68 61 | 72 20 3d 20 46 4e 54 35 |m->v_cha|r = FNT5|
|000013f0| 58 39 5f 56 43 48 41 52 | 3b 0a 09 74 65 72 6d 2d |X9_VCHAR|;..term-|
|00001400| 3e 68 5f 63 68 61 72 20 | 3d 20 46 4e 54 35 58 39 |>h_char |= FNT5X9|
|00001410| 5f 48 43 48 41 52 3b 0a | 09 74 65 72 6d 2d 3e 76 |_HCHAR;.|.term->v|
|00001420| 5f 74 69 63 20 3d 20 46 | 4e 54 35 58 39 5f 48 42 |_tic = F|NT5X9_HB|
|00001430| 49 54 53 3b 0a 09 74 65 | 72 6d 2d 3e 68 5f 74 69 |ITS;..te|rm->h_ti|
|00001440| 63 20 3d 20 46 4e 54 35 | 58 39 5f 48 42 49 54 53 |c = FNT5|X9_HBITS|
|00001450| 3b 0a 09 62 72 65 61 6b | 3b 0a 20 20 20 20 63 61 |;..break|;. ca|
|00001460| 73 65 20 32 3a 0a 09 62 | 5f 63 68 61 72 73 69 7a |se 2:..b|_charsiz|
|00001470| 65 28 46 4e 54 39 58 31 | 37 29 3b 0a 09 74 65 72 |e(FNT9X1|7);..ter|
|00001480| 6d 2d 3e 76 5f 63 68 61 | 72 20 3d 20 46 4e 54 39 |m->v_cha|r = FNT9|
|00001490| 58 31 37 5f 56 43 48 41 | 52 3b 0a 09 74 65 72 6d |X17_VCHA|R;..term|
|000014a0| 2d 3e 68 5f 63 68 61 72 | 20 3d 20 46 4e 54 39 58 |->h_char| = FNT9X|
|000014b0| 31 37 5f 48 43 48 41 52 | 3b 0a 09 74 65 72 6d 2d |17_HCHAR|;..term-|
|000014c0| 3e 76 5f 74 69 63 20 3d | 20 46 4e 54 39 58 31 37 |>v_tic =| FNT9X17|
|000014d0| 5f 48 42 49 54 53 3b 0a | 09 74 65 72 6d 2d 3e 68 |_HBITS;.|.term->h|
|000014e0| 5f 74 69 63 20 3d 20 46 | 4e 54 39 58 31 37 5f 48 |_tic = F|NT9X17_H|
|000014f0| 42 49 54 53 3b 0a 09 62 | 72 65 61 6b 3b 0a 20 20 |BITS;..b|reak;. |
|00001500| 20 20 63 61 73 65 20 33 | 3a 0a 09 62 5f 63 68 61 | case 3|:..b_cha|
|00001510| 72 73 69 7a 65 28 46 4e | 54 31 33 58 32 35 29 3b |rsize(FN|T13X25);|
|00001520| 0a 09 74 65 72 6d 2d 3e | 76 5f 63 68 61 72 20 3d |..term->|v_char =|
|00001530| 20 46 4e 54 31 33 58 32 | 35 5f 56 43 48 41 52 3b | FNT13X2|5_VCHAR;|
|00001540| 0a 09 74 65 72 6d 2d 3e | 68 5f 63 68 61 72 20 3d |..term->|h_char =|
|00001550| 20 46 4e 54 31 33 58 32 | 35 5f 48 43 48 41 52 3b | FNT13X2|5_HCHAR;|
|00001560| 0a 09 74 65 72 6d 2d 3e | 76 5f 74 69 63 20 3d 20 |..term->|v_tic = |
|00001570| 46 4e 54 31 33 58 32 35 | 5f 48 42 49 54 53 3b 0a |FNT13X25|_HBITS;.|
|00001580| 09 74 65 72 6d 2d 3e 68 | 5f 74 69 63 20 3d 20 46 |.term->h|_tic = F|
|00001590| 4e 54 31 33 58 32 35 5f | 48 42 49 54 53 3b 0a 09 |NT13X25_|HBITS;..|
|000015a0| 62 72 65 61 6b 3b 0a 20 | 20 20 20 7d 0a 7d 0a 0a |break;. | }.}..|
|000015b0| 0a 54 45 52 4d 5f 50 55 | 42 4c 49 43 20 76 6f 69 |.TERM_PU|BLIC voi|
|000015c0| 64 20 50 42 4d 67 72 61 | 70 68 69 63 73 28 29 0a |d PBMgra|phics().|
|000015d0| 7b 0a 20 20 20 20 69 6e | 74 20 6e 75 6d 70 6c 61 |{. in|t numpla|
|000015e0| 6e 65 73 20 3d 20 31 3b | 0a 0a 20 20 20 20 73 77 |nes = 1;|.. sw|
|000015f0| 69 74 63 68 20 28 70 62 | 6d 5f 6d 6f 64 65 29 20 |itch (pb|m_mode) |
|00001600| 7b 0a 20 20 20 20 63 61 | 73 65 20 31 3a 0a 09 6e |{. ca|se 1:..n|
|00001610| 75 6d 70 6c 61 6e 65 73 | 20 3d 20 33 3b 0a 09 62 |umplanes| = 3;..b|
|00001620| 72 65 61 6b 3b 0a 20 20 | 20 20 63 61 73 65 20 32 |reak;. | case 2|
|00001630| 3a 0a 09 6e 75 6d 70 6c | 61 6e 65 73 20 3d 20 34 |:..numpl|anes = 4|
|00001640| 3b 0a 09 62 72 65 61 6b | 3b 0a 20 20 20 20 7d 0a |;..break|;. }.|
|00001650| 0a 20 20 20 20 2f 2a 20 | 48 42 42 20 39 38 30 32 |. /* |HBB 9802|
|00001660| 32 36 3a 20 74 68 69 73 | 20 69 73 20 6e 6f 74 20 |26: this| is not |
|00001670| 74 68 65 20 72 69 67 68 | 74 20 70 6c 61 63 65 20 |the righ|t place |
|00001680| 74 6f 20 64 6f 20 74 68 | 69 73 3a 20 73 65 74 66 |to do th|is: setf|
|00001690| 6f 6e 74 28 29 20 69 6e | 66 6c 75 65 6e 63 65 73 |ont() in|fluences|
|000016a0| 0a 20 20 20 20 20 2a 20 | 66 69 65 6c 64 73 20 6f |. * |fields o|
|000016b0| 66 20 74 68 65 20 74 65 | 72 6d 74 61 62 6c 65 20 |f the te|rmtable |
|000016c0| 65 6e 74 72 79 2c 20 61 | 6e 64 20 74 68 65 72 65 |entry, a|nd there|
|000016d0| 66 6f 72 65 20 6d 75 73 | 74 20 62 65 20 63 61 6c |fore mus|t be cal|
|000016e0| 6c 65 64 20 62 79 20 69 | 6e 69 74 28 29 0a 20 20 |led by i|nit(). |
|000016f0| 20 20 20 2a 20 61 6c 72 | 65 61 64 79 2e 20 2a 2f | * alr|eady. */|
|00001700| 0a 20 20 20 20 2f 2a 20 | 50 42 4d 73 65 74 66 6f |. /* |PBMsetfo|
|00001710| 6e 74 28 29 3b 20 2a 2f | 0a 20 20 20 20 2f 2a 20 |nt(); */|. /* |
|00001720| 72 6f 74 61 74 65 20 70 | 6c 6f 74 20 2d 39 30 20 |rotate p|lot -90 |
|00001730| 64 65 67 72 65 65 73 20 | 62 79 20 72 65 76 65 72 |degrees |by rever|
|00001740| 73 69 6e 67 20 58 4d 41 | 58 20 61 6e 64 20 59 4d |sing XMA|X and YM|
|00001750| 41 58 20 61 6e 64 20 62 | 79 20 0a 20 20 20 20 20 |AX and b|y . |
|00001760| 20 20 73 65 74 74 69 6e | 67 20 62 5f 72 61 73 74 | settin|g b_rast|
|00001770| 65 72 6d 6f 64 65 20 74 | 6f 20 54 52 55 45 20 2a |ermode t|o TRUE *|
|00001780| 2f 0a 20 20 20 20 62 5f | 6d 61 6b 65 62 69 74 6d |/. b_|makebitm|
|00001790| 61 70 28 28 75 6e 73 69 | 67 6e 65 64 20 69 6e 74 |ap((unsi|gned int|
|000017a0| 29 20 28 50 42 4d 5f 59 | 4d 41 58 20 2a 20 79 73 |) (PBM_Y|MAX * ys|
|000017b0| 69 7a 65 29 2c 0a 09 09 | 20 28 75 6e 73 69 67 6e |ize),...| (unsign|
|000017c0| 65 64 20 69 6e 74 29 20 | 28 50 42 4d 5f 58 4d 41 |ed int) |(PBM_XMA|
|000017d0| 58 20 2a 20 78 73 69 7a | 65 29 2c 20 6e 75 6d 70 |X * xsiz|e), nump|
|000017e0| 6c 61 6e 65 73 29 3b 0a | 20 20 20 20 62 5f 72 61 |lanes);.| b_ra|
|000017f0| 73 74 65 72 6d 6f 64 65 | 20 3d 20 54 52 55 45 3b |stermode| = TRUE;|
|00001800| 0a 0a 20 20 20 20 69 66 | 20 28 70 62 6d 5f 6d 6f |.. if| (pbm_mo|
|00001810| 64 65 20 21 3d 20 30 29 | 0a 09 62 5f 73 65 74 6c |de != 0)|..b_setl|
|00001820| 69 6e 65 74 79 70 65 28 | 30 29 3b 09 2f 2a 20 73 |inetype(|0);./* s|
|00001830| 6f 6c 69 64 20 6c 69 6e | 65 73 20 2a 2f 0a 7d 0a |olid lin|es */.}.|
|00001840| 0a 0a 73 74 61 74 69 63 | 20 76 6f 69 64 20 50 42 |..static| void PB|
|00001850| 4d 6d 6f 6e 6f 74 65 78 | 74 28 29 0a 7b 0a 20 20 |Mmonotex|t().{. |
|00001860| 20 20 72 65 67 69 73 74 | 65 72 20 69 6e 74 20 78 | regist|er int x|
|00001870| 2c 20 6a 2c 20 72 6f 77 | 3b 0a 0a 20 20 20 20 66 |, j, row|;.. f|
|00001880| 70 75 74 73 28 22 50 34 | 5c 6e 22 2c 20 67 70 6f |puts("P4|\n", gpo|
|00001890| 75 74 66 69 6c 65 29 3b | 0a 20 20 20 20 66 70 72 |utfile);|. fpr|
|000018a0| 69 6e 74 66 28 67 70 6f | 75 74 66 69 6c 65 2c 20 |intf(gpo|utfile, |
|000018b0| 22 25 75 20 25 75 5c 6e | 22 2c 20 62 5f 79 73 69 |"%u %u\n|", b_ysi|
|000018c0| 7a 65 2c 20 62 5f 78 73 | 69 7a 65 29 3b 0a 0a 20 |ze, b_xs|ize);.. |
|000018d0| 20 20 20 2f 2a 20 64 75 | 6d 70 20 62 69 74 6d 61 | /* du|mp bitma|
|000018e0| 70 20 69 6e 20 72 61 73 | 74 65 72 20 6d 6f 64 65 |p in ras|ter mode|
|000018f0| 20 2a 2f 0a 20 20 20 20 | 66 6f 72 20 28 78 20 3d | */. |for (x =|
|00001900| 20 62 5f 78 73 69 7a 65 | 20 2d 20 31 3b 20 78 20 | b_xsize| - 1; x |
|00001910| 3e 3d 20 30 3b 20 78 2d | 2d 29 20 7b 0a 09 72 6f |>= 0; x-|-) {..ro|
|00001920| 77 20 3d 20 28 62 5f 79 | 73 69 7a 65 20 2f 20 38 |w = (b_y|size / 8|
|00001930| 29 20 2d 20 31 3b 0a 09 | 66 6f 72 20 28 6a 20 3d |) - 1;..|for (j =|
|00001940| 20 72 6f 77 3b 20 6a 20 | 3e 3d 20 30 3b 20 6a 2d | row; j |>= 0; j-|
|00001950| 2d 29 20 7b 0a 09 20 20 | 20 20 28 76 6f 69 64 29 |-) {.. | (void)|
|00001960| 20 66 70 75 74 63 28 28 | 63 68 61 72 29 20 28 2a | fputc((|char) (*|
|00001970| 28 28 2a 62 5f 70 29 5b | 6a 5d 20 2b 20 78 29 29 |((*b_p)[|j] + x))|
|00001980| 2c 20 67 70 6f 75 74 66 | 69 6c 65 29 3b 0a 09 7d |, gpoutf|ile);..}|
|00001990| 0a 20 20 20 20 7d 0a 0a | 20 20 20 20 62 5f 66 72 |. }..| b_fr|
|000019a0| 65 65 62 69 74 6d 61 70 | 28 29 3b 0a 7d 0a 0a 73 |eebitmap|();.}..s|
|000019b0| 74 61 74 69 63 20 76 6f | 69 64 20 50 42 4d 67 72 |tatic vo|id PBMgr|
|000019c0| 61 79 74 65 78 74 28 29 | 0a 7b 0a 20 20 20 20 72 |aytext()|.{. r|
|000019d0| 65 67 69 73 74 65 72 20 | 69 6e 74 20 78 2c 20 6a |egister |int x, j|
|000019e0| 2c 20 72 6f 77 3b 0a 20 | 20 20 20 72 65 67 69 73 |, row;. | regis|
|000019f0| 74 65 72 20 69 6e 74 20 | 69 2c 20 76 61 6c 75 65 |ter int |i, value|
|00001a00| 3b 0a 20 20 20 20 69 6e | 74 20 6d 61 73 6b 2c 20 |;. in|t mask, |
|00001a10| 70 6c 61 6e 65 31 2c 20 | 70 6c 61 6e 65 32 2c 20 |plane1, |plane2, |
|00001a20| 70 6c 61 6e 65 33 3b 0a | 0a 20 20 20 20 66 70 72 |plane3;.|. fpr|
|00001a30| 69 6e 74 66 28 67 70 6f | 75 74 66 69 6c 65 2c 20 |intf(gpo|utfile, |
|00001a40| 22 5c 0a 50 35 5c 6e 5c | 0a 25 75 20 25 75 5c 6e |"\.P5\n\|.%u %u\n|
|00001a50| 5c 0a 25 75 5c 6e 22 2c | 0a 09 20 20 20 20 62 5f |\.%u\n",|.. b_|
|00001a60| 79 73 69 7a 65 2c 20 62 | 5f 78 73 69 7a 65 2c 0a |ysize, b|_xsize,.|
|00001a70| 09 20 20 20 20 32 35 35 | 29 3b 0a 0a 20 20 20 20 |. 255|);.. |
|00001a80| 2f 2a 20 64 75 6d 70 20 | 62 69 74 6d 61 70 20 69 |/* dump |bitmap i|
|00001a90| 6e 20 72 61 73 74 65 72 | 20 6d 6f 64 65 20 2a 2f |n raster| mode */|
|00001aa0| 0a 20 20 20 20 66 6f 72 | 20 28 78 20 3d 20 62 5f |. for| (x = b_|
|00001ab0| 78 73 69 7a 65 20 2d 20 | 31 3b 20 78 20 3e 3d 20 |xsize - |1; x >= |
|00001ac0| 30 3b 20 78 2d 2d 29 20 | 7b 0a 09 72 6f 77 20 3d |0; x--) |{..row =|
|00001ad0| 20 28 62 5f 79 73 69 7a | 65 20 2f 20 38 29 20 2d | (b_ysiz|e / 8) -|
|00001ae0| 20 31 3b 0a 09 66 6f 72 | 20 28 6a 20 3d 20 72 6f | 1;..for| (j = ro|
|00001af0| 77 3b 20 6a 20 3e 3d 20 | 30 3b 20 6a 2d 2d 29 20 |w; j >= |0; j--) |
|00001b00| 7b 0a 09 20 20 20 20 6d | 61 73 6b 20 3d 20 30 78 |{.. m|ask = 0x|
|00001b10| 38 30 3b 0a 09 20 20 20 | 20 70 6c 61 6e 65 31 20 |80;.. | plane1 |
|00001b20| 3d 20 28 2a 28 28 2a 62 | 5f 70 29 5b 6a 5d 20 2b |= (*((*b|_p)[j] +|
|00001b30| 20 78 29 29 3b 0a 09 20 | 20 20 20 70 6c 61 6e 65 | x));.. | plane|
|00001b40| 32 20 3d 20 28 2a 28 28 | 2a 62 5f 70 29 5b 6a 20 |2 = (*((|*b_p)[j |
|00001b50| 2b 20 62 5f 70 73 69 7a | 65 5d 20 2b 20 78 29 29 |+ b_psiz|e] + x))|
|00001b60| 3b 0a 09 20 20 20 20 70 | 6c 61 6e 65 33 20 3d 20 |;.. p|lane3 = |
|00001b70| 28 2a 28 28 2a 62 5f 70 | 29 5b 6a 20 2b 20 62 5f |(*((*b_p|)[j + b_|
|00001b80| 70 73 69 7a 65 20 2b 20 | 62 5f 70 73 69 7a 65 5d |psize + |b_psize]|
|00001b90| 20 2b 20 78 29 29 3b 0a | 09 20 20 20 20 66 6f 72 | + x));.|. for|
|00001ba0| 20 28 69 20 3d 20 30 3b | 20 69 20 3c 20 38 3b 20 | (i = 0;| i < 8; |
|00001bb0| 69 2b 2b 29 20 7b 0a 09 | 09 2f 2a 20 48 42 42 3a |i++) {..|./* HBB:|
|00001bc0| 20 54 68 65 20 76 61 6c | 75 65 73 20 62 65 6c 6f | The val|ues belo|
|00001bd0| 77 20 61 72 65 20 73 65 | 74 20 74 6f 20 73 70 61 |w are se|t to spa|
|00001be0| 6e 20 74 68 65 20 66 75 | 6c 6c 20 72 61 6e 67 65 |n the fu|ll range|
|00001bf0| 0a 09 09 20 2a 20 66 72 | 6f 6d 20 30 20 75 70 20 |... * fr|om 0 up |
|00001c00| 74 6f 20 32 35 35 20 69 | 6e 20 37 20 73 74 65 70 |to 255 i|n 7 step|
|00001c10| 73 3a 20 2a 2f 0a 09 09 | 76 61 6c 75 65 20 3d 20 |s: */...|value = |
|00001c20| 32 35 35 3b 0a 09 09 69 | 66 20 28 70 6c 61 6e 65 |255;...i|f (plane|
|00001c30| 31 20 26 20 6d 61 73 6b | 29 0a 09 09 20 20 20 20 |1 & mask|)... |
|00001c40| 76 61 6c 75 65 20 2d 3d | 20 33 36 3b 0a 09 09 69 |value -=| 36;...i|
|00001c50| 66 20 28 70 6c 61 6e 65 | 32 20 26 20 6d 61 73 6b |f (plane|2 & mask|
|00001c60| 29 0a 09 09 20 20 20 20 | 76 61 6c 75 65 20 2d 3d |)... |value -=|
|00001c70| 20 37 33 3b 0a 09 09 69 | 66 20 28 70 6c 61 6e 65 | 73;...i|f (plane|
|00001c80| 33 20 26 20 6d 61 73 6b | 29 0a 09 09 20 20 20 20 |3 & mask|)... |
|00001c90| 76 61 6c 75 65 20 2d 3d | 20 31 34 36 3b 0a 09 09 |value -=| 146;...|
|00001ca0| 28 76 6f 69 64 29 20 66 | 70 75 74 63 28 28 63 68 |(void) f|putc((ch|
|00001cb0| 61 72 29 20 28 76 61 6c | 75 65 29 2c 20 67 70 6f |ar) (val|ue), gpo|
|00001cc0| 75 74 66 69 6c 65 29 3b | 0a 09 09 6d 61 73 6b 20 |utfile);|...mask |
|00001cd0| 3e 3e 3d 20 31 3b 0a 09 | 20 20 20 20 7d 0a 09 7d |>>= 1;..| }..}|
|00001ce0| 0a 20 20 20 20 7d 0a 0a | 20 20 20 20 62 5f 66 72 |. }..| b_fr|
|00001cf0| 65 65 62 69 74 6d 61 70 | 28 29 3b 0a 7d 0a 0a 73 |eebitmap|();.}..s|
|00001d00| 74 61 74 69 63 20 76 6f | 69 64 20 50 42 4d 63 6f |tatic vo|id PBMco|
|00001d10| 6c 6f 72 74 65 78 74 28 | 29 0a 7b 0a 20 20 20 20 |lortext(|).{. |
|00001d20| 72 65 67 69 73 74 65 72 | 20 69 6e 74 20 78 2c 20 |register| int x, |
|00001d30| 6a 2c 20 72 6f 77 3b 0a | 20 20 20 20 72 65 67 69 |j, row;.| regi|
|00001d40| 73 74 65 72 20 69 6e 74 | 20 69 3b 0a 20 20 20 20 |ster int| i;. |
|00001d50| 69 6e 74 20 6d 61 73 6b | 2c 20 70 6c 61 6e 65 31 |int mask|, plane1|
|00001d60| 2c 20 70 6c 61 6e 65 32 | 2c 20 70 6c 61 6e 65 33 |, plane2|, plane3|
|00001d70| 2c 20 70 6c 61 6e 65 34 | 3b 0a 20 20 20 20 69 6e |, plane4|;. in|
|00001d80| 74 20 72 65 64 2c 20 67 | 72 65 65 6e 2c 20 62 6c |t red, g|reen, bl|
|00001d90| 75 65 3b 0a 0a 20 20 20 | 20 66 70 72 69 6e 74 66 |ue;.. | fprintf|
|00001da0| 28 67 70 6f 75 74 66 69 | 6c 65 2c 20 22 50 36 5c |(gpoutfi|le, "P6\|
|00001db0| 6e 5c 0a 25 75 20 25 75 | 5c 6e 5c 0a 25 75 5c 6e |n\.%u %u|\n\.%u\n|
|00001dc0| 22 2c 0a 09 20 20 20 20 | 62 5f 79 73 69 7a 65 2c |",.. |b_ysize,|
|00001dd0| 20 62 5f 78 73 69 7a 65 | 2c 0a 09 20 20 20 20 32 | b_xsize|,.. 2|
|00001de0| 35 35 29 3b 0a 0a 20 20 | 20 20 2f 2a 20 64 75 6d |55);.. | /* dum|
|00001df0| 70 20 62 69 74 6d 61 70 | 20 69 6e 20 72 61 73 74 |p bitmap| in rast|
|00001e00| 65 72 20 6d 6f 64 65 20 | 2a 2f 0a 20 20 20 20 66 |er mode |*/. f|
|00001e10| 6f 72 20 28 78 20 3d 20 | 62 5f 78 73 69 7a 65 20 |or (x = |b_xsize |
|00001e20| 2d 20 31 3b 20 78 20 3e | 3d 20 30 3b 20 78 2d 2d |- 1; x >|= 0; x--|
|00001e30| 29 20 7b 0a 09 72 6f 77 | 20 3d 20 28 62 5f 79 73 |) {..row| = (b_ys|
|00001e40| 69 7a 65 20 2f 20 38 29 | 20 2d 20 31 3b 0a 09 66 |ize / 8)| - 1;..f|
|00001e50| 6f 72 20 28 6a 20 3d 20 | 72 6f 77 3b 20 6a 20 3e |or (j = |row; j >|
|00001e60| 3d 20 30 3b 20 6a 2d 2d | 29 20 7b 0a 09 20 20 20 |= 0; j--|) {.. |
|00001e70| 20 6d 61 73 6b 20 3d 20 | 30 78 38 30 3b 0a 09 20 | mask = |0x80;.. |
|00001e80| 20 20 20 70 6c 61 6e 65 | 31 20 3d 20 28 2a 28 28 | plane|1 = (*((|
|00001e90| 2a 62 5f 70 29 5b 6a 5d | 20 2b 20 78 29 29 3b 0a |*b_p)[j]| + x));.|
|00001ea0| 09 20 20 20 20 70 6c 61 | 6e 65 32 20 3d 20 28 2a |. pla|ne2 = (*|
|00001eb0| 28 28 2a 62 5f 70 29 5b | 6a 20 2b 20 62 5f 70 73 |((*b_p)[|j + b_ps|
|00001ec0| 69 7a 65 5d 20 2b 20 78 | 29 29 3b 0a 09 20 20 20 |ize] + x|));.. |
|00001ed0| 20 70 6c 61 6e 65 33 20 | 3d 20 28 2a 28 28 2a 62 | plane3 |= (*((*b|
|00001ee0| 5f 70 29 5b 6a 20 2b 20 | 62 5f 70 73 69 7a 65 20 |_p)[j + |b_psize |
|00001ef0| 2b 20 62 5f 70 73 69 7a | 65 5d 20 2b 20 78 29 29 |+ b_psiz|e] + x))|
|00001f00| 3b 0a 09 20 20 20 20 70 | 6c 61 6e 65 34 20 3d 20 |;.. p|lane4 = |
|00001f10| 28 2a 28 28 2a 62 5f 70 | 29 5b 6a 20 2b 20 62 5f |(*((*b_p|)[j + b_|
|00001f20| 70 73 69 7a 65 20 2b 20 | 62 5f 70 73 69 7a 65 20 |psize + |b_psize |
|00001f30| 2b 20 62 5f 70 73 69 7a | 65 5d 20 2b 20 78 29 29 |+ b_psiz|e] + x))|
|00001f40| 3b 0a 09 20 20 20 20 66 | 6f 72 20 28 69 20 3d 20 |;.. f|or (i = |
|00001f50| 30 3b 20 69 20 3c 20 38 | 3b 20 69 2b 2b 29 20 7b |0; i < 8|; i++) {|
|00001f60| 0a 09 09 72 65 64 20 3d | 20 28 70 6c 61 6e 65 33 |...red =| (plane3|
|00001f70| 20 26 20 6d 61 73 6b 29 | 20 3f 20 31 20 3a 20 33 | & mask)| ? 1 : 3|
|00001f80| 3b 0a 09 09 67 72 65 65 | 6e 20 3d 20 28 70 6c 61 |;...gree|n = (pla|
|00001f90| 6e 65 32 20 26 20 6d 61 | 73 6b 29 20 3f 20 31 20 |ne2 & ma|sk) ? 1 |
|00001fa0| 3a 20 33 3b 0a 09 09 62 | 6c 75 65 20 3d 20 28 70 |: 3;...b|lue = (p|
|00001fb0| 6c 61 6e 65 31 20 26 20 | 6d 61 73 6b 29 20 3f 20 |lane1 & |mask) ? |
|00001fc0| 31 20 3a 20 33 3b 0a 09 | 09 69 66 20 28 70 6c 61 |1 : 3;..|.if (pla|
|00001fd0| 6e 65 34 20 26 20 6d 61 | 73 6b 29 20 7b 0a 09 09 |ne4 & ma|sk) {...|
|00001fe0| 20 20 20 20 72 65 64 2d | 2d 3b 0a 09 09 20 20 20 | red-|-;... |
|00001ff0| 20 67 72 65 65 6e 2d 2d | 3b 0a 09 09 20 20 20 20 | green--|;... |
|00002000| 62 6c 75 65 2d 2d 3b 0a | 09 09 7d 0a 09 09 2f 2a |blue--;.|..}.../*|
|00002010| 20 48 42 42 3a 20 27 38 | 35 27 20 69 73 20 65 78 | HBB: '8|5' is ex|
|00002020| 61 63 74 6c 79 20 32 35 | 35 2f 33 2c 20 73 6f 20 |actly 25|5/3, so |
|00002030| 74 68 69 73 20 73 70 61 | 6e 73 20 74 68 65 20 66 |this spa|ns the f|
|00002040| 75 6c 6c 0a 09 09 20 2a | 20 72 61 6e 67 65 20 6f |ull... *| range o|
|00002050| 66 20 63 6f 6c 6f 72 73 | 20 69 6e 20 74 68 72 65 |f colors| in thre|
|00002060| 65 20 73 74 65 70 73 3a | 20 2a 2f 0a 09 09 28 76 |e steps:| */...(v|
|00002070| 6f 69 64 29 20 66 70 75 | 74 63 28 28 63 68 61 72 |oid) fpu|tc((char|
|00002080| 29 20 28 72 65 64 20 2a | 20 38 35 29 2c 20 67 70 |) (red *| 85), gp|
|00002090| 6f 75 74 66 69 6c 65 29 | 3b 0a 09 09 28 76 6f 69 |outfile)|;...(voi|
|000020a0| 64 29 20 66 70 75 74 63 | 28 28 63 68 61 72 29 20 |d) fputc|((char) |
|000020b0| 28 67 72 65 65 6e 20 2a | 20 38 35 29 2c 20 67 70 |(green *| 85), gp|
|000020c0| 6f 75 74 66 69 6c 65 29 | 3b 0a 09 09 28 76 6f 69 |outfile)|;...(voi|
|000020d0| 64 29 20 66 70 75 74 63 | 28 28 63 68 61 72 29 20 |d) fputc|((char) |
|000020e0| 28 62 6c 75 65 20 2a 20 | 38 35 29 2c 20 67 70 6f |(blue * |85), gpo|
|000020f0| 75 74 66 69 6c 65 29 3b | 0a 09 09 6d 61 73 6b 20 |utfile);|...mask |
|00002100| 3e 3e 3d 20 31 3b 0a 09 | 20 20 20 20 7d 0a 09 7d |>>= 1;..| }..}|
|00002110| 0a 20 20 20 20 7d 0a 0a | 20 20 20 20 62 5f 66 72 |. }..| b_fr|
|00002120| 65 65 62 69 74 6d 61 70 | 28 29 3b 0a 7d 0a 0a 54 |eebitmap|();.}..T|
|00002130| 45 52 4d 5f 50 55 42 4c | 49 43 20 76 6f 69 64 20 |ERM_PUBL|IC void |
|00002140| 50 42 4d 74 65 78 74 28 | 29 0a 7b 0a 20 20 20 20 |PBMtext(|).{. |
|00002150| 73 77 69 74 63 68 20 28 | 70 62 6d 5f 6d 6f 64 65 |switch (|pbm_mode|
|00002160| 29 20 7b 0a 20 20 20 20 | 63 61 73 65 20 30 3a 0a |) {. |case 0:.|
|00002170| 09 50 42 4d 6d 6f 6e 6f | 74 65 78 74 28 29 3b 0a |.PBMmono|text();.|
|00002180| 09 62 72 65 61 6b 3b 0a | 20 20 20 20 63 61 73 65 |.break;.| case|
|00002190| 20 31 3a 0a 09 50 42 4d | 67 72 61 79 74 65 78 74 | 1:..PBM|graytext|
|000021a0| 28 29 3b 0a 09 62 72 65 | 61 6b 3b 0a 20 20 20 20 |();..bre|ak;. |
|000021b0| 63 61 73 65 20 32 3a 0a | 09 50 42 4d 63 6f 6c 6f |case 2:.|.PBMcolo|
|000021c0| 72 74 65 78 74 28 29 3b | 0a 09 62 72 65 61 6b 3b |rtext();|..break;|
|000021d0| 0a 20 20 20 20 7d 0a 7d | 0a 0a 0a 54 45 52 4d 5f |. }.}|...TERM_|
|000021e0| 50 55 42 4c 49 43 20 76 | 6f 69 64 20 50 42 4d 6c |PUBLIC v|oid PBMl|
|000021f0| 69 6e 65 74 79 70 65 28 | 6c 69 6e 65 74 79 70 65 |inetype(|linetype|
|00002200| 29 0a 69 6e 74 20 6c 69 | 6e 65 74 79 70 65 3b 0a |).int li|netype;.|
|00002210| 7b 0a 20 20 20 20 73 77 | 69 74 63 68 20 28 70 62 |{. sw|itch (pb|
|00002220| 6d 5f 6d 6f 64 65 29 20 | 7b 0a 20 20 20 20 63 61 |m_mode) |{. ca|
|00002230| 73 65 20 30 3a 0a 09 62 | 5f 73 65 74 6c 69 6e 65 |se 0:..b|_setline|
|00002240| 74 79 70 65 28 6c 69 6e | 65 74 79 70 65 29 3b 0a |type(lin|etype);.|
|00002250| 09 62 72 65 61 6b 3b 0a | 20 20 20 20 63 61 73 65 |.break;.| case|
|00002260| 20 31 3a 0a 09 69 66 20 | 28 6c 69 6e 65 74 79 70 | 1:..if |(linetyp|
|00002270| 65 20 3e 3d 20 37 29 0a | 09 20 20 20 20 6c 69 6e |e >= 7).|. lin|
|00002280| 65 74 79 70 65 20 25 3d | 20 37 3b 0a 09 62 5f 73 |etype %=| 7;..b_s|
|00002290| 65 74 76 61 6c 75 65 28 | 70 67 6d 5f 67 72 61 79 |etvalue(|pgm_gray|
|000022a0| 5b 6c 69 6e 65 74 79 70 | 65 20 2b 20 32 5d 29 3b |[linetyp|e + 2]);|
|000022b0| 0a 09 62 72 65 61 6b 3b | 0a 20 20 20 20 63 61 73 |..break;|. cas|
|000022c0| 65 20 32 3a 0a 09 69 66 | 20 28 6c 69 6e 65 74 79 |e 2:..if| (linety|
|000022d0| 70 65 20 3e 3d 20 39 29 | 0a 09 20 20 20 20 6c 69 |pe >= 9)|.. li|
|000022e0| 6e 65 74 79 70 65 20 25 | 3d 20 39 3b 0a 09 62 5f |netype %|= 9;..b_|
|000022f0| 73 65 74 76 61 6c 75 65 | 28 70 70 6d 5f 63 6f 6c |setvalue|(ppm_col|
|00002300| 6f 72 5b 6c 69 6e 65 74 | 79 70 65 20 2b 20 32 5d |or[linet|ype + 2]|
|00002310| 29 3b 0a 09 62 72 65 61 | 6b 3b 0a 20 20 20 20 7d |);..brea|k;. }|
|00002320| 0a 7d 0a 0a 54 45 52 4d | 5f 50 55 42 4c 49 43 20 |.}..TERM|_PUBLIC |
|00002330| 76 6f 69 64 20 50 42 4d | 70 6f 69 6e 74 28 78 2c |void PBM|point(x,|
|00002340| 20 79 2c 20 70 6f 69 6e | 74 29 0a 75 6e 73 69 67 | y, poin|t).unsig|
|00002350| 6e 65 64 20 69 6e 74 20 | 78 2c 20 79 3b 0a 69 6e |ned int |x, y;.in|
|00002360| 74 20 70 6f 69 6e 74 3b | 0a 7b 0a 20 20 20 20 69 |t point;|.{. i|
|00002370| 66 20 28 70 62 6d 5f 6d | 6f 64 65 20 3d 3d 20 30 |f (pbm_m|ode == 0|
|00002380| 29 0a 09 6c 69 6e 65 5f | 61 6e 64 5f 70 6f 69 6e |)..line_|and_poin|
|00002390| 74 28 78 2c 20 79 2c 20 | 70 6f 69 6e 74 29 3b 0a |t(x, y, |point);.|
|000023a0| 20 20 20 20 65 6c 73 65 | 0a 09 64 6f 5f 70 6f 69 | else|..do_poi|
|000023b0| 6e 74 28 78 2c 20 79 2c | 20 70 6f 69 6e 74 29 3b |nt(x, y,| point);|
|000023c0| 0a 7d 0a 0a 23 65 6e 64 | 69 66 20 2f 2a 20 54 45 |.}..#end|if /* TE|
|000023d0| 52 4d 5f 42 4f 44 59 20 | 2a 2f 0a 0a 23 69 66 64 |RM_BODY |*/..#ifd|
|000023e0| 65 66 20 54 45 52 4d 5f | 54 41 42 4c 45 0a 0a 23 |ef TERM_|TABLE..#|
|000023f0| 64 65 66 69 6e 65 20 50 | 42 4d 6d 6f 76 65 20 62 |define P|BMmove b|
|00002400| 5f 6d 6f 76 65 0a 23 64 | 65 66 69 6e 65 20 50 42 |_move.#d|efine PB|
|00002410| 4d 76 65 63 74 6f 72 20 | 62 5f 76 65 63 74 6f 72 |Mvector |b_vector|
|00002420| 0a 23 64 65 66 69 6e 65 | 20 50 42 4d 74 65 78 74 |.#define| PBMtext|
|00002430| 5f 61 6e 67 6c 65 20 62 | 5f 74 65 78 74 5f 61 6e |_angle b|_text_an|
|00002440| 67 6c 65 0a 23 64 65 66 | 69 6e 65 20 50 42 4d 70 |gle.#def|ine PBMp|
|00002450| 75 74 5f 74 65 78 74 20 | 62 5f 70 75 74 5f 74 65 |ut_text |b_put_te|
|00002460| 78 74 0a 0a 54 45 52 4d | 5f 54 41 42 4c 45 5f 53 |xt..TERM|_TABLE_S|
|00002470| 54 41 52 54 28 70 62 6d | 5f 64 72 69 76 65 72 29 |TART(pbm|_driver)|
|00002480| 0a 20 20 20 20 22 70 62 | 6d 22 2c 20 22 50 6f 72 |. "pb|m", "Por|
|00002490| 74 61 62 6c 65 20 62 69 | 74 6d 61 70 20 5b 73 6d |table bi|tmap [sm|
|000024a0| 61 6c 6c 20 6d 65 64 69 | 75 6d 20 6c 61 72 67 65 |all medi|um large|
|000024b0| 5d 20 5b 6d 6f 6e 6f 63 | 68 72 6f 6d 65 20 67 72 |] [monoc|hrome gr|
|000024c0| 61 79 20 63 6f 6c 6f 72 | 5d 22 2c 0a 20 20 20 20 |ay color|]",. |
|000024d0| 50 42 4d 5f 58 4d 41 58 | 2c 20 50 42 4d 5f 59 4d |PBM_XMAX|, PBM_YM|
|000024e0| 41 58 2c 20 50 42 4d 5f | 56 43 48 41 52 2c 0a 20 |AX, PBM_|VCHAR,. |
|000024f0| 20 20 20 50 42 4d 5f 48 | 43 48 41 52 2c 20 50 42 | PBM_H|CHAR, PB|
|00002500| 4d 5f 56 54 49 43 2c 20 | 50 42 4d 5f 48 54 49 43 |M_VTIC, |PBM_HTIC|
|00002510| 2c 20 50 42 4d 6f 70 74 | 69 6f 6e 73 2c 0a 20 20 |, PBMopt|ions,. |
|00002520| 20 20 50 42 4d 69 6e 69 | 74 2c 20 50 42 4d 72 65 | PBMini|t, PBMre|
|00002530| 73 65 74 2c 20 50 42 4d | 74 65 78 74 2c 20 6e 75 |set, PBM|text, nu|
|00002540| 6c 6c 5f 73 63 61 6c 65 | 2c 0a 20 20 20 20 50 42 |ll_scale|,. PB|
|00002550| 4d 67 72 61 70 68 69 63 | 73 2c 20 50 42 4d 6d 6f |Mgraphic|s, PBMmo|
|00002560| 76 65 2c 20 50 42 4d 76 | 65 63 74 6f 72 2c 20 50 |ve, PBMv|ector, P|
|00002570| 42 4d 6c 69 6e 65 74 79 | 70 65 2c 0a 20 20 20 20 |BMlinety|pe,. |
|00002580| 50 42 4d 70 75 74 5f 74 | 65 78 74 2c 20 50 42 4d |PBMput_t|ext, PBM|
|00002590| 74 65 78 74 5f 61 6e 67 | 6c 65 2c 20 6e 75 6c 6c |text_ang|le, null|
|000025a0| 5f 6a 75 73 74 69 66 79 | 5f 74 65 78 74 2c 20 50 |_justify|_text, P|
|000025b0| 42 4d 70 6f 69 6e 74 2c | 0a 20 20 20 20 64 6f 5f |BMpoint,|. do_|
|000025c0| 61 72 72 6f 77 2c 20 73 | 65 74 5f 66 6f 6e 74 5f |arrow, s|et_font_|
|000025d0| 6e 75 6c 6c 2c 0a 20 20 | 20 20 30 2c 09 09 09 09 |null,. | 0,....|
|000025e0| 2f 2a 20 70 6f 69 6e 74 | 73 69 7a 65 20 2a 2f 0a |/* point|size */.|
|000025f0| 20 20 20 20 54 45 52 4d | 5f 43 41 4e 5f 4d 55 4c | TERM|_CAN_MUL|
|00002600| 54 49 50 4c 4f 54 20 7c | 20 54 45 52 4d 5f 42 49 |TIPLOT || TERM_BI|
|00002610| 4e 41 52 59 0a 54 45 52 | 4d 5f 54 41 42 4c 45 5f |NARY.TER|M_TABLE_|
|00002620| 45 4e 44 28 70 62 6d 5f | 64 72 69 76 65 72 29 0a |END(pbm_|driver).|
|00002630| 0a 23 75 6e 64 65 66 20 | 4c 41 53 54 5f 54 45 52 |.#undef |LAST_TER|
|00002640| 4d 0a 23 64 65 66 69 6e | 65 20 4c 41 53 54 5f 54 |M.#defin|e LAST_T|
|00002650| 45 52 4d 20 70 62 6d 5f | 64 72 69 76 65 72 0a 0a |ERM pbm_|driver..|
|00002660| 23 65 6e 64 69 66 20 2f | 2a 20 54 45 52 4d 5f 54 |#endif /|* TERM_T|
|00002670| 41 42 4c 45 20 2a 2f 0a | 0a 0a 23 69 66 64 65 66 |ABLE */.|..#ifdef|
|00002680| 20 54 45 52 4d 5f 48 45 | 4c 50 0a 53 54 41 52 54 | TERM_HE|LP.START|
|00002690| 5f 48 45 4c 50 28 70 62 | 6d 29 0a 22 31 20 70 62 |_HELP(pb|m)."1 pb|
|000026a0| 6d 22 2c 0a 22 3f 63 6f | 6d 6d 61 6e 64 73 20 73 |m",."?co|mmands s|
|000026b0| 65 74 20 74 65 72 6d 69 | 6e 61 6c 20 70 62 6d 22 |et termi|nal pbm"|
|000026c0| 2c 0a 22 3f 73 65 74 20 | 74 65 72 6d 69 6e 61 6c |,."?set |terminal|
|000026d0| 20 70 62 6d 22 2c 0a 22 | 3f 73 65 74 20 74 65 72 | pbm",."|?set ter|
|000026e0| 6d 20 70 62 6d 22 2c 0a | 22 3f 74 65 72 6d 69 6e |m pbm",.|"?termin|
|000026f0| 61 6c 20 70 62 6d 22 2c | 0a 22 3f 74 65 72 6d 20 |al pbm",|."?term |
|00002700| 70 62 6d 22 2c 0a 22 3f | 70 62 6d 22 2c 0a 22 20 |pbm",."?|pbm",." |
|00002710| 53 65 76 65 72 61 6c 20 | 6f 70 74 69 6f 6e 73 20 |Several |options |
|00002720| 6d 61 79 20 62 65 20 73 | 65 74 20 69 6e 20 74 68 |may be s|et in th|
|00002730| 65 20 60 70 62 6d 60 20 | 74 65 72 6d 69 6e 61 6c |e `pbm` |terminal|
|00002740| 2d 2d 2d 74 68 65 20 64 | 72 69 76 65 72 20 66 6f |---the d|river fo|
|00002750| 72 20 50 42 4d 70 6c 75 | 73 2e 22 2c 0a 22 22 2c |r PBMplu|s.",."",|
|00002760| 0a 22 20 53 79 6e 74 61 | 78 3a 22 2c 0a 22 20 20 |." Synta|x:",." |
|00002770| 20 20 20 20 20 73 65 74 | 20 74 65 72 6d 69 6e 61 | set| termina|
|00002780| 6c 20 70 62 6d 20 7b 3c | 66 6f 6e 74 73 69 7a 65 |l pbm {<|fontsize|
|00002790| 3e 7d 20 7b 3c 6d 6f 64 | 65 3e 7d 22 2c 0a 22 22 |>} {<mod|e>}",.""|
|000027a0| 2c 0a 22 20 77 68 65 72 | 65 20 3c 66 6f 6e 74 73 |,." wher|e <fonts|
|000027b0| 69 7a 65 3e 20 69 73 20 | 60 73 6d 61 6c 6c 60 2c |ize> is |`small`,|
|000027c0| 20 60 6d 65 64 69 75 6d | 60 2c 20 6f 72 20 60 6c | `medium|`, or `l|
|000027d0| 61 72 67 65 60 20 61 6e | 64 20 3c 6d 6f 64 65 3e |arge` an|d <mode>|
|000027e0| 20 69 73 20 60 6d 6f 6e | 6f 63 68 72 6f 6d 65 60 | is `mon|ochrome`|
|000027f0| 2c 22 2c 0a 22 20 60 67 | 72 61 79 60 20 6f 72 20 |,",." `g|ray` or |
|00002800| 60 63 6f 6c 6f 72 60 2e | 20 20 54 68 65 20 64 65 |`color`.| The de|
|00002810| 66 61 75 6c 74 20 70 6c | 6f 74 20 73 69 7a 65 20 |fault pl|ot size |
|00002820| 69 73 20 36 34 30 20 70 | 69 78 65 6c 73 20 77 69 |is 640 p|ixels wi|
|00002830| 64 65 20 61 6e 64 20 34 | 38 30 20 70 69 78 65 6c |de and 4|80 pixel|
|00002840| 73 22 2c 0a 22 20 68 69 | 67 68 3b 20 74 68 69 73 |s",." hi|gh; this|
|00002850| 20 6d 61 79 20 62 65 20 | 63 68 61 6e 67 65 64 20 | may be |changed |
|00002860| 62 79 20 60 73 65 74 20 | 73 69 7a 65 60 2e 22 2c |by `set |size`.",|
|00002870| 0a 22 22 2c 0a 22 20 54 | 68 65 20 6f 75 74 70 75 |."",." T|he outpu|
|00002880| 74 20 6f 66 20 74 68 65 | 20 60 70 62 6d 60 20 64 |t of the| `pbm` d|
|00002890| 72 69 76 65 72 20 64 65 | 70 65 6e 64 73 20 75 70 |river de|pends up|
|000028a0| 6f 6e 20 3c 6d 6f 64 65 | 3e 3a 20 60 6d 6f 6e 6f |on <mode|>: `mono|
|000028b0| 63 68 72 6f 6d 65 60 20 | 70 72 6f 64 75 63 65 73 |chrome` |produces|
|000028c0| 20 61 22 2c 0a 22 20 70 | 6f 72 74 61 62 6c 65 20 | a",." p|ortable |
|000028d0| 62 69 74 6d 61 70 20 28 | 6f 6e 65 20 62 69 74 20 |bitmap (|one bit |
|000028e0| 70 65 72 20 70 69 78 65 | 6c 29 2c 20 60 67 72 61 |per pixe|l), `gra|
|000028f0| 79 60 20 61 20 70 6f 72 | 74 61 62 6c 65 20 67 72 |y` a por|table gr|
|00002900| 61 79 6d 61 70 20 28 74 | 68 72 65 65 20 62 69 74 |aymap (t|hree bit|
|00002910| 73 22 2c 0a 22 20 70 65 | 72 20 70 69 78 65 6c 29 |s",." pe|r pixel)|
|00002920| 20 61 6e 64 20 60 63 6f | 6c 6f 72 60 20 61 20 70 | and `co|lor` a p|
|00002930| 6f 72 74 61 62 6c 65 20 | 70 69 78 6d 61 70 20 28 |ortable |pixmap (|
|00002940| 63 6f 6c 6f 72 2c 20 66 | 6f 75 72 20 62 69 74 73 |color, f|our bits|
|00002950| 20 70 65 72 20 70 69 78 | 65 6c 29 2e 22 2c 0a 22 | per pix|el).",."|
|00002960| 22 2c 0a 22 20 54 68 65 | 20 6f 75 74 70 75 74 20 |",." The| output |
|00002970| 6f 66 20 74 68 69 73 20 | 64 72 69 76 65 72 20 63 |of this |driver c|
|00002980| 61 6e 20 62 65 20 75 73 | 65 64 20 77 69 74 68 20 |an be us|ed with |
|00002990| 4a 65 66 20 50 6f 73 6b | 61 6e 7a 65 72 27 73 20 |Jef Posk|anzer's |
|000029a0| 65 78 63 65 6c 6c 65 6e | 74 20 50 42 4d 50 4c 55 |excellen|t PBMPLU|
|000029b0| 53 22 2c 0a 22 20 70 61 | 63 6b 61 67 65 2c 20 77 |S",." pa|ckage, w|
|000029c0| 68 69 63 68 20 70 72 6f | 76 69 64 65 73 20 70 72 |hich pro|vides pr|
|000029d0| 6f 67 72 61 6d 73 20 74 | 6f 20 63 6f 6e 76 65 72 |ograms t|o conver|
|000029e0| 74 20 74 68 65 20 61 62 | 6f 76 65 20 50 42 4d 50 |t the ab|ove PBMP|
|000029f0| 4c 55 53 20 66 6f 72 6d | 61 74 73 20 74 6f 20 47 |LUS form|ats to G|
|00002a00| 49 46 2c 22 2c 0a 22 20 | 54 49 46 46 2c 20 4d 61 |IF,",." |TIFF, Ma|
|00002a10| 63 50 61 69 6e 74 2c 20 | 4d 61 63 69 6e 74 6f 73 |cPaint, |Macintos|
|00002a20| 68 20 50 49 43 54 2c 20 | 50 43 58 2c 20 58 31 31 |h PICT, |PCX, X11|
|00002a30| 20 62 69 74 6d 61 70 20 | 61 6e 64 20 6d 61 6e 79 | bitmap |and many|
|00002a40| 20 6f 74 68 65 72 73 2e | 20 20 50 42 4d 50 4c 55 | others.| PBMPLU|
|00002a50| 53 20 6d 61 79 22 2c 0a | 22 20 62 65 20 6f 62 74 |S may",.|" be obt|
|00002a60| 61 69 6e 65 64 20 66 72 | 6f 6d 20 66 74 70 2e 78 |ained fr|om ftp.x|
|00002a70| 2e 6f 72 67 2e 20 20 54 | 68 65 20 72 65 6c 65 76 |.org. T|he relev|
|00002a80| 61 6e 74 20 66 69 6c 65 | 73 20 68 61 76 65 20 6e |ant file|s have n|
|00002a90| 61 6d 65 73 20 74 68 61 | 74 20 62 65 67 69 6e 20 |ames tha|t begin |
|00002aa0| 77 69 74 68 22 2c 0a 22 | 20 5c 22 6e 65 74 70 62 |with",."| \"netpb|
|00002ab0| 6d 2d 31 6d 61 72 31 39 | 39 34 2e 70 31 5c 22 3b |m-1mar19|94.p1\";|
|00002ac0| 20 74 68 65 79 20 72 65 | 73 69 64 65 20 69 6e 20 | they re|side in |
|00002ad0| 2f 63 6f 6e 74 72 69 62 | 2f 75 74 69 6c 69 74 69 |/contrib|/utiliti|
|00002ae0| 65 73 2e 20 20 54 68 65 | 20 70 61 63 6b 61 67 65 |es. The| package|
|00002af0| 20 63 61 6e 22 2c 0a 22 | 20 70 72 6f 62 61 62 6c | can",."| probabl|
|00002b00| 79 20 61 6c 73 6f 20 62 | 65 20 6f 62 74 61 69 6e |y also b|e obtain|
|00002b10| 65 64 20 66 72 6f 6d 20 | 6f 6e 65 20 6f 66 20 74 |ed from |one of t|
|00002b20| 68 65 20 6d 61 6e 79 20 | 73 69 74 65 73 20 74 68 |he many |sites th|
|00002b30| 61 74 20 6d 69 72 72 6f | 72 73 20 66 74 70 2e 78 |at mirro|rs ftp.x|
|00002b40| 2e 6f 72 67 2e 22 2c 0a | 22 22 2c 0a 22 20 45 78 |.org.",.|"",." Ex|
|00002b50| 61 6d 70 6c 65 73 3a 22 | 2c 0a 22 20 20 20 20 20 |amples:"|,." |
|00002b60| 20 20 73 65 74 20 74 65 | 72 6d 69 6e 61 6c 20 70 | set te|rminal p|
|00002b70| 62 6d 20 73 6d 61 6c 6c | 20 6d 6f 6e 6f 63 68 72 |bm small| monochr|
|00002b80| 6f 6d 65 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |ome | |
|00002b90| 23 20 64 65 66 61 75 6c | 74 73 22 2c 0a 22 20 20 |# defaul|ts",." |
|00002ba0| 20 20 20 20 20 73 65 74 | 20 73 69 7a 65 20 32 2c | set| size 2,|
|00002bb0| 32 3b 20 73 65 74 20 74 | 65 72 6d 69 6e 61 6c 20 |2; set t|erminal |
|00002bc0| 70 62 6d 20 63 6f 6c 6f | 72 20 6d 65 64 69 75 6d |pbm colo|r medium|
|00002bd0| 22 0a 45 4e 44 5f 48 45 | 4c 50 28 70 62 6d 29 0a |".END_HE|LP(pbm).|
|00002be0| 23 65 6e 64 69 66 20 2f | 2a 20 54 45 52 4d 5f 48 |#endif /|* TERM_H|
|00002bf0| 45 4c 50 20 2a 2f 0a | |ELP */. | |
+--------+-------------------------+-------------------------+--------+--------+